home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Prog / L-M / MacOberon 4.0 / MacOberon™ 4.0 Folder / Demo.Mod (.txt) < prev    next >
Encoding:
Oberon Text  |  1993-10-25  |  1.5 KB  |  25 lines  |  [.Ob./.Ob5]
  1. Syntax10.Scn.Fnt
  2. Syntax10b.Scn.Fnt
  3. Syntax10i.Scn.Fnt
  4. ParcElems
  5. Alloc
  6. MODULE Demo;    (* Simple Example *)
  7. IMPORT
  8.     Texts, Oberon;
  9.     W: Texts.Writer;
  10. PROCEDURE Do*;
  11. BEGIN
  12.     Texts.WriteString(W, "Hello World"); Texts.WriteLn(W);
  13.     Texts.Append(Oberon.Log, W.buf)
  14. END Do;
  15. BEGIN    Texts.OpenWriter(W)
  16. END Demo.
  17. 1.    Move the cursor into this viewer and press the Enter key on the keypad. This will cause the viewer to be marked (a star will appear).
  18. 2.    Execute the command Compiler.Compile * (press control key over it). A star as a parameter means to use the contents of the marked viewer.
  19. 3.    You may now invoke the new command Demo.Do as often as you like. Just move the mouse cursor over it and press control.
  20. 4.    Modify the program, for example by changing the text that is printed.
  21. 5.    Compile again by invoking Compiler.Compile * as usual.
  22. 6.    Execute Demo.Do again: the changes you made in the program have no effect (yet), because the old version of module Demo is still loaded.
  23. 7.    You may (re-)load the latest version of a command by interclicking the mouse button during invocation (pressing the control key).
  24. 8.    Error positions in the text may be located by selecting the error message "pos ... err ..." in the System.Log and executing Edit.Locate . Selecting the first character on the line is sufficient.
  25.